home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disk User Volume 3 #6 / Commodore_Disk_User_Vol.3_6_1990_-.d64 / flashy backs (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  1.0 KB  |  29 lines
  1. 10 rem *****************************
  2. 20 rem ***    routine three      ***
  3. 30 rem *****************************
  4. 40 rem *** flashing four colour  ***
  5. 50 rem *** screens !             ***
  6. 60 rem *** the colours can be    ***
  7. 70 rem *** altered by doing this:***
  8. 80 rem *****************************
  9. 90 rem *** change 2 in line 100  ***
  10. 100 rem *** change 7 in line 100  ***
  11. 110 rem *** change 6 in line 110  ***
  12. 120 rem *** change 11 in line 110 ***
  13. 130 rem *****************************
  14. 140 rem *** speed can be changed: ***
  15. 150 rem *** poke 56501, followed  ***
  16. 160 rem *** by a number from 0-255***
  17. 170 rem *** 255 being the fastest.***
  18. 180 rem *****************************
  19. 190 rem ***     david dewar       ***
  20. 200 rem *****************************
  21. 210 for t=49152 to 49196:read a:poke t,a:next t
  22. 230 data 120,169,192,141,21,3,169,13,141,20,3,88,96,169,2,141,32,208,169,7,141
  23. 240 data 33,208,162,255,232,208,253,200,208,248,169,6,141,32,208,169,11,141,33
  24. 250 data 208,76,49,234,96
  25. 260 rem *** example ***
  26. 270 print"[147]i'm speeding up!!"
  27. 280 sys 49152
  28. 290 for t=255 to 1 step-1:poke 56501,t:for q=0 to 10:next q:next t
  29.